home *** CD-ROM | disk | FTP | other *** search
INI File | 1997-09-11 | 16.9 KB | 279 lines |
- [aliases]
- n0=/prot.add.all {
- n1= if (# == $null) { error1 usa esto en la ventana del canal. | halt }
- n2= .enable #user.prot.add.all | .raw whois $1
- n3=}
- n4=/prot.add.chan {
- n5= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n6= set %User.Channel # | .enable #user.prot.add.chan | .raw whois $1
- n7=}
- n8=/prot.rem.all {
- n9= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n10= .enable #user.prot.rem.all | .raw whois $1
- n11=}
- n12=/prot.rem.chan {
- n13= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n14= set %User.Channel # | .enable #user.prot.rem.chan | .raw whois $1
- n15=}
- n16=/prot.clear {
- n17= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n18= .rlevel 85 | write -c $mircdirsistema\protect.ini
- n19= meni BORRADA lista de Proteccion. BORRADA
- n20=}
- n21=/autoop.add.all {
- n22= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n23= .enable #user.autoop.add.all | .raw whois $1
- n24=}
- n25=/autoop.add.chan {
- n26= if (# == $null) { error1 Usa esto en la ventana del canal . | halt }
- n27= set %User.Channel # | .enable #user.autoop.add.chan | .raw whois $1
- n28=}
- n29=/autoop.rem.all {
- n30= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n31= .enable #user.autoop.rem.all | .raw whois $1
- n32=}
- n33=/autoop.rem.chan {
- n34= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n35= set %User.Channel # | .enable #user.autoop.rem.chan | .raw whois $1
- n36=}
- n37=/autoop.clear {
- n38= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n39= .rlevel 80 | write -c $mircdirsistema\autoop.ini
- n40= meni BORRADA lista de Auto OP BORRADA.
- n41=}
- n42=/autov.add.all {
- n43= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n44= .enable #user.autov.add.all | .raw whois $1
- n45=}
- n46=/autov.add.chan {
- n47= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n48= set %User.Channel # | .enable #user.autov.add.chan | .raw whois $1
- n49=}
- n50=/autov.rem.all {
- n51= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n52= .enable #user.autov.rem.all | .raw whois $1
- n53=}
- n54=/autov.rem.chan {
- n55= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n56= set %User.Channel # | .enable #user.autov.rem.chan | .raw whois $1
- n57=}
- n58=/autov.clear {
- n59= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n60= .rlevel 60 | write -c $mircdirsistema\voice.ini
- n61= meni BORRADA Lista de Auto Voz. BORRADA
- n62=}
- n63=/shit.add.all {
- n64= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n65= set %User.Reason $?="Razon:" | if (%User.Reason == $null) { set %User.Reason Lamer }
- n66= set %User.Mask $2 | set %User.Channel # | .enable #user.shit.add.all | .raw whois $1
- n67=}
- n68=/shit.add.chan {
- n69= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n70= set %User.Reason $?="Razon:" | if (%User.Reason == $null) { set %User.Reason Lamer }
- n71= set %User.Mask $2 | set %User.Channel # | .enable #user.shit.add.chan | .raw whois $1
- n72=}
- n73=/shit.rem.all {
- n74= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n75= .enable #user.shit.rem.all | .raw whois $1
- n76=}
- n77=/shit.rem.chan {
- n78= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n79= set %User.Channel # | .enable #user.shit.rem.chan | .raw whois $1
- n80=}
- n81=/shit.clear {
- n82= if (# == $null) { error1 Usa esto en la ventana del canal. | halt }
- n83= .rlevel 1 | write -c $mircdirsistema\shitlist.ini
- n84= meni BORRADA Shitlist BORRADA
- n85=}
- n86=/logo {
- n87= if (%aver == azul) { unset %aver | return 18,18L18,0(wWw)4,0v5,0F7,0i2,0n3,0a6,0l18,18L15,15.18,0 }
- n88= if (%aver == rojo) { unset %aver | return 4,4L4,0(wWw)18,0v5,0F7,0i2,0n3,0a6,0l4,4L15,15.4,0 }
- n89=}
- n90=/winsock {
- n91= if ($lof(c:\windows\winsock.dll) == 19040) { return $true }
- n92= else { return $false }
- n93=}
- n94=/yesno {
- n95= set %Var.Temp $$?=" [ $+ [ *1 ] [ $+ [ (s/n)? ] ] ] " | set %Var.Temp $left(1,%Var.Temp)
- n96= if ($upper(%Var.Temp) == S) { return 1 } | else { return 0 }
- n97=}
- n98=/average {
- n99= %Temp.Var = $1 * 100 | set %Temp.Var2 $2
- n100= %Temp.Total = %Temp.Var / %Temp.Var2
- n101= %temp.end = . $+ $right(%temp.total,2)
- n102= %temp.num = $replace(%temp.total,$right(%temp.total,2),%temp.end)
- n103= return %Temp.Num
- n104=}
- n105=/remain {
- n106= %Temp.Num = $2 - $1
- n107= %Temp.Num = %Temp.Num * $3
- n108= %Temp.Num = %Temp.Num / $1
- n109= return %Temp.Num
- n110=}
- n111=/per.sec {
- n112= %Temp.Time = $1 * 100
- n113= %Temp.Time = %Temp.Time / $2
- n114= %temp.end = . $+ $right(%temp.time,2)
- n115= %temp.num = $replace(%temp.time,$right(%temp.time,2),%temp.end)
- n116= return %Temp.Num
- n117=}
- n118=/percent {
- n119= if ($1 == $2) { return 100% | halt }
- n120= %Temp.Num = $1 * 10000 | %Temp.Total = $2
- n121= %Temp.Percent = %Temp.Num / %Temp.total
- n122= if ($len(%temp.Percent) < 4) { %Temp.Num = $left(%Temp.Percent,1) }
- n123= else { %Temp.Num = $left(%Temp.Percent,2) }
- n124= %Temp.Percent = %Temp.Num
- n125= return %Temp.Percent $+ % | halt
- n126=}
- n127=/lof.m {
- n128= %Temp.Bytes = $lof($1)
- n129= %Temp.Bytes = [ [ %Temp.Bytes ] / [ 10 ] ]
- n130= %Temp.Int = [ [ %Temp.bytes ] / [ 1024 ] ]
- n131= if ($len(%Temp.Int) < 3) { %Temp.Int = 0 [ $+ [ %Temp.Int ] ] }
- n132= %temp.end = . $+ $right(%temp.int,2)
- n133= %temp.num = $replace(%temp.int,$right(%temp.int,2),%temp.end)
- n134= return %temp.num $+ MB
- n135=}
- n136=/lof.k {
- n137= %Temp.Bytes = $lof($1)
- n138= %Temp.Bytes = %Temp.Bytes * 100
- n139= %Temp.Int = %Temp.bytes / 1024
- n140= %temp.end = . $+ $right(%temp.int,2)
- n141= %temp.num = $replace(%temp.int,$right(%temp.int,2),%temp.end)
- n142= return %temp.num $+ K
- n143=}
- n144=/kps.a {
- n145= %Temp.Bytes = $1
- n146= set %Temp.Send $send(0)
- n147= %Temp.Int = %Temp.bytes / %Temp.Send
- n148= if ($len(%Temp.Int) < 4) { set %Temp.Int 0 [ $+ [ %Temp.Int ] ] }
- n149= %Temp.End = . $+ $right(%Temp.int,3)
- n150= %Temp.Num = $replace(%Temp.Int,$right(%Temp.Int,3),%Temp.End)
- n151= return %Temp.Num
- n152=}
- n153=/kps.t {
- n154= %Temp.Bytes = $1
- n155= if ($len(%Temp.Bytes) < 4) { set %Temp.Bytes 0 [ $+ [ %Temp.Bytes ] ] }
- n156= %Temp.End = . $+ $right(%Temp.Bytes,3)
- n157= %Temp.Num = $replace(%Temp.Bytes,$right(%Temp.Bytes,3),%Temp.End)
- n158= return %Temp.Num
- n159=}
- n160=/fecho {
- n161= window -mob @FA 50 50 500 240 20,18
- n162= aline @FA 4 ******************************************
- n163= aline @FA 15 ................. 4 FLOOD DETECTADO
- n164= aline @FA 4 ******************************************
- n165= aline @FA 18Nick........... 1 $$1
- n166= aline @FA 18Flood...........1 *3
- n167= aline @FA 18Direccion.... 1 ( $+ $$2 $+ )
- n168= aline @FA 11[F10] para ver su /whois
- n169= aline @FA 11[F11] para rastrearlo.
- n170= aline @FA 11[F12] para kickearlo.
- n171= if (%Group.sounds == On) { splay $mircdir $+ wavs\flood.wav }
- n172=}
- n173=/cecho {
- n174= window -mob @FA 50 50 500 240 20,18
- n175= aline @FA 4 ******************************************
- n176= aline @FA 4 ESTAN FLOODEANDO EL CANAL: 1 $3
- n177= aline @FA 4 ******************************************
- n178= aline @FA 18 Flood.......... 1 $4-
- n179= aline @FA 18 Nick............ 1 $1
- n180= aline @FA 18 Direccion...1 ( $+ $2 $+ )
- n181= aline @FA 11 F10 para ver su /whois
- n182= aline @FA 11 F11 para rastrearlo.
- n183= aline @FA 11 F12 para kickearlo.
- n184= if (%Group.sounds == On) { splay $mircdir $+ wavs\flood.wav }
- n185=}
- n186=/linker.echo.split {
- n187= mens NetSplit de 1 $1
- n188= if (%tkau == On) { sf5 }
- n189= if (%tkau == Off) { /window @NT 50 50 520 120 c:\www\taker\bot.txt 20,15 | /aline @NT 18 Netsplit: $1 | / aline @NT 18 De: 1 $2 | /aline @NT 18 Motivo: 1 $3- | /aline @NT 4 Pulsa el boton derecho sobre esta ventana para meter un Bot en el Split }
- n190=}
- n191=/linker.echo.merge {
- n192= meni 5 Reunion del servidor $1
- n193=}
- n194=/prot.echo {
- n195= clear @FD | window -moab @FD 50 50 240 120 20,18
- n196= aline @FD 4Tu Proteccion de Flood
- n197= aline @FD 18 DCC...........1 %Var.ProtDcc
- n198= aline @FD 18 CTCP.........1 %Var.ProtCtcp
- n199= aline @FD 18 TEXTO.......1 %Var.ProtText
- n200=}
- n201=/chanprot.echo {
- n202= window -moab @FD 50 50 310 210 20,18
- n203= aline @FD 4Proteccion de Flood para el Canal
- n204= aline @FD 18 Clones..................1 %Group.Clones
- n205= aline @FD 18 Flooders...............1 %Group.AutoFk
- n206= aline @FD 18 NetSplit................1 %Group.ProtSplit
- n207= aline @FD 18 Masivo Join..........1 %Group.MassJoin
- n208= aline @FD 18 Masivo Deop........1 %Group.MassDeop
- n209= aline @FD 18 Masivo Kick..........1 %Group.MassKick
- n210= aline @FD 18 Topic.....................1 %Group.Topic
- n211=}
- n212=/user.echo {
- n213= window -moab @LT 50 50 330 150 20,18
- n214= aline @LT 4 Configuracion de la lista de Usuarios
- n215= aline @LT 18 Lista de Proteccion....1 %Group.Protect
- n216= aline @LT 18 Lista de AutoOp.........1 %Group.AutoOp
- n217= aline @LT 18 Lista de AutoVoz........1 %Group.AutoVoice
- n218= aline @LT 18 Shit-List......................1 %Group.AutoShit
- n219=}
- n220=/system.echo {
- n221= window -moab @ST 50 50 240 150 20,18
- n222= aline @ST 4 Configuracion del Sistema
- n223= aline @ST 18 Auto Away......1 %Group.AutoAway
- n224= aline @ST 18 Auto Pager.....1 %Group.AutoPager
- n225= aline @ST 18 Linklooker.......1 %Group.Linklooker
- n226= aline @ST 18 XDCC............1 %Group.XDCC
- n227=}
- n228=/winsock.error { error1 Para usar esto necesitas tener instalado el Winsock2 Final. }
- n229=/uNF1 { /say 2... 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 2... }
- n230=/uNF2 { /say 14[(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)] }
- n231=/uNF3 { /say 5[%4uNF5%]5[%4uNF5%]5[%4uNF5%]5[%4uNF5%]5[%4uNF5%]5[%4uNF5%]5[%4uNF5%]5[%4uNF5%] }
- n232=/uNF4 { /say 3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3! }
- n233=/uNF5 { /say 14µ15µ16µ6uNF15µ14µ15µ6uNF15µ14µ15µ6uNF15µ14µ15µ6uNF15µ14µ15µ6uNF15µ14µ15µ6uNF15µ14µ15µ6uNF16µ15µ14µ }
- n234=/uNF6 { /say 10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10::: }
- n235=/uNF7 { /say 2(6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@2 ) }
- n236=/uNF8 { /say 16ò15ò14ò 11u10N11F 14ò15ò16ò 11u10N11F 16ò15ò14ò 11u10N11F 14ò15ò16ò 11u10N11F 16ò15ò14ò 11u10N11F 14ò15ò16ò 11u10N11F 16ò15ò14ò 11u10N11F 14ò15ò16ò 11u10N11F 16ò15ò14ò 11u10N11F 14ò15ò16ò }
- n237=/uNF9 { /say 13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥ }
- n238=/uNF10 { /say 2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗ }
- n239=/RanuNF {
- n240= msg # $Ran.uNF
- n241=}
- n242=/Ran.uNF {
- n243= %RanuNF = $rand(1,10)
- n244= if (%RanuNF = 1) { return 2. . . 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 6[10uNF6] 2. . . }
- n245= if (%RanuNF = 2) { return 14[(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)6.14(13uNF14)] }
- n246= if (%RanuNF = 3) { return 5[%4uNF5%]5[%4uNF5%]5[%4uNF5%]5[%4uNF5%]5[%4uNF5%]5[%4uNF5%]5[%4uNF5%]5[%4uNF5%] }
- n247= if (%RanuNF = 4) { return 3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3!9uNF3! }
- n248= if (%RanuNF = 5) { return 14µ15µ16µ6uNF15µ14µ15µ6uNF15µ14µ15µ6uNF15µ14µ15µ6uNF15µ14µ15µ6uNF15µ14µ15µ6uNF15µ14µ15µ6uNF16µ15µ14µ }
- n249= if (%RanuNF = 6) { return 10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10:::11uNF10::: }
- n250= if (%RanuNF = 7) { return 2(6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@13uNF6@2) }
- n251= if (%RanuNF = 8) { return 16ò15ò14ò 11u10N11F 14ò15ò16ò 11u10N11F 16ò15ò14ò 11u10N11F 14ò15ò16ò 11u10N11F 16ò15ò14ò 11u10N11F 14ò15ò16ò 11u10N11F 16ò15ò14ò 11u10N11F 14ò15ò16ò 11u10N11F 16ò15ò14ò 11u10N11F 14ò15ò16ò }
- n252= if (%RanuNF = 9) { return 13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥13≤.6uNF13.≥ }
- n253= if (%RanuNF = 10) { return 2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗2½14uNF2╗ }
- n254=}
- n255=meni { set %aver azul | echo -a $logo *1 }
- n256=mens { set %aver rojo | echo -a $logo *1 }
- n257=meno { set %aver azul | echo -s $logo *1 }
- n258=secho { set %aver rojo | echo -a $logo *1 }
- n259=YF1 run $mircdir $+ mirc32.exe $mircdir $+ clones\wclon1.ini
- n260=YF2 run $mircdir $+ mirc32.exe $mircdir $+ clones\wclon2.ini
- n261=YF3 run $mircdir $+ mirc32.exe $mircdir $+ clones\wclon3.ini
- n262=YF4 run $mircdir $+ mirc32.exe $mircdir $+ clones\wclon4.ini
- n263=YF5 run $mircdir $+ mirc32.exe $mircdir $+ clones\wclon5.ini
- n264=YF6 run $mircdir $+ mirc32.exe $mircdir $+ clones\wclon6.ini
- n265=YF12 { dde www1 command "" /exit | dde www2 command "" /exit | dde www3 command "" /exit | dde www4 command "" /exit | dde www5 command "" /exit | dde www6 command "" /exit | meni MATANDO Clones MATANDO }
- n266=Yserver { dde www1 command "" /server %cloneserver | dde www2 command "" /server %cloneserver | dde www3 command "" /server %cloneserver | dde www4 command "" /server %cloneserver | dde www5 command "" /server %cloneserver | dde www6 command "" /server %cloneserver | meni CAMBIANDO Clones a %cloneserver CAMBIANDO }
- n267=yjoin { dde www1 command "" /join $$1 | dde www2 command "" /join $$1 | dde www3 command "" /join $$1 | dde www4 command "" /join $$1 | dde www5 command "" /join $$1 | dde www6 command "" /join $$1 | meni ENTRANDO Clones a $$1 ENTRANDO }
- n268=ypart { dde www1 command "" /part $$1 | dde www2 command "" /part $$1 | dde www3 command "" /part $$1 | dde www4 command "" /part $$1 | dde www5 command "" /part $$1 | dde www6 command "" /part $$1 | meni SALIENDO Clones de $$1 SALIENDO }
- n269=ychange { dde www1 command "" /nick $$?="Clono 1" | dde www2 command "" /nick $$?="Clono 2" | dde www3 command "" /nick $$?="Clono 3" | dde www4 command "" /nick $$?="Clono 4" | dde www5 command "" /nick $$?="Clono 5" | dde www6 command "" /nick $$?="Clono 6" | meni RENOMBRADOS clones RENOMBRADOS }
- n270=yslow { dde www1 command "" /join $$1 | .timer 1 30 /dde www2 command "" /join $$1 | .timer 1 55 /dde www3 command "" /join $$1 | .timer 1 80 /dde www4 command "" /join $$1 | .timer 1 109 /dde www5 command "" /join $$1 | .timer 1 133 /dde www6 command "" /join $$1 | meni ENTRANDO Clonos Lentamente a $$1 ENTRANDO }
- n271=ycheck { window -moab @TUS_CLONES 50 50 450 120 | dde www1 command "" /check | dde www2 command "" /check | dde www3 command "" /check | dde www4 command "" /check | dde www5 command "" /check | dde www6 command "" /check }
- n272=mgc { .load -pc c:\www\sistema\wwwp2.ini }
- n273=mnc { .load -pc c:\www\sistema\wwwp1.ini }
- n274=mgn { .load -pn c:\www\sistema\wwwp2.ini }
- n275=mnn { .load -pn c:\www\sistema\wwwp1.ini }
- n276=sal { /window @NT 50 50 520 120 c:\www\armas\bot.txt 20,15 | /aline @NT 18 Netsplit: $1 | / aline @NT 18 De: 1 $2 | /aline @NT 18 Motivo: 1 $3- | /aline @NT 4 Pulsa el boton derecho sobre esta ventana para meter un Bot en el Split }
-